/ Giga Games 1 / Giga Games.iso / net / go / prog / gotex.tex

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 25 20 47 6f 54 65 58 20 | 30 2e 31 0a 25 20 59 6f |% GoTeX |0.1.% Yo|
|00000010| 75 79 69 20 43 68 65 6e | 0a 25 20 57 65 64 20 4a |uyi Chen|.% Wed J|
|00000020| 61 6e 20 31 33 20 30 31 | 3a 33 33 3a 35 39 20 45 |an 13 01|:33:59 E|
|00000030| 53 54 20 31 39 39 33 0a | 25 20 2a 2a 2a 2a 2a 2a |ST 1993.|% ******|
|00000040| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000050| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 25 0a 25 20 54 68 69 |********|.%.% Thi|
|00000060| 73 20 69 73 20 61 20 73 | 65 74 20 6f 66 20 54 65 |s is a s|et of Te|
|00000070| 58 20 61 6e 64 20 4c 61 | 74 65 58 20 6d 61 63 72 |X and La|teX macr|
|00000080| 6f 73 20 63 68 61 6e 67 | 69 6e 67 0a 25 20 61 6e |os chang|ing.% an|
|00000090| 20 41 53 43 49 49 20 47 | 4f 20 62 6f 61 72 64 20 | ASCII G|O board |
|000000a0| 69 6e 74 6f 20 61 20 70 | 72 65 74 79 20 6c 6f 6f |into a p|rety loo|
|000000b0| 6b 69 6e 67 20 4c 61 54 | 65 58 20 47 6f 20 62 6f |king LaT|eX Go bo|
|000000c0| 61 72 64 2e 0a 25 20 50 | 75 74 20 74 68 69 73 20 |ard..% P|ut this |
|000000d0| 66 69 6c 65 20 69 6e 20 | 61 20 66 69 6c 65 20 63 |file in |a file c|
|000000e0| 61 6c 6c 65 64 20 67 6f | 74 65 78 2e 74 65 78 0a |alled go|tex.tex.|
|000000f0| 25 20 61 6e 64 20 61 64 | 64 20 61 20 6c 69 6e 65 |% and ad|d a line|
|00000100| 20 61 73 20 66 6f 6c 6c | 6f 77 0a 25 20 20 20 20 | as foll|ow.%    |
|00000110| 20 20 20 20 20 5c 69 6e | 70 75 74 7b 67 6f 74 65 |     \in|put{gote|
|00000120| 78 7d 0a 25 20 69 6e 20 | 79 6f 75 72 20 6c 61 74 |x}.% in |your lat|
|00000130| 65 78 20 66 69 6c 65 20 | 62 65 66 6f 72 65 20 5c |ex file |before \|
|00000140| 62 65 67 69 6e 7b 64 6f | 63 75 6d 65 6e 74 7d 0a |begin{do|cument}.|
|00000150| 25 20 54 68 65 6e 20 66 | 6f 6c 6c 6f 77 69 6e 67 |% Then f|ollowing|
|00000160| 20 6c 69 6e 65 73 20 69 | 6e 20 4c 61 54 65 58 20 | lines i|n LaTeX |
|00000170| 77 69 6c 6c 20 64 6f 20 | 74 68 65 20 74 72 69 63 |will do |the tric|
|00000180| 6b 0a 25 0a 25 20 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |k.%.% **|********|
|00000190| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001c0| 2a 2a 2a 2a 0a 25 20 0a | 25 20 5c 67 6f 62 6f 61 |****.% .|% \goboa|
|000001d0| 72 64 75 6c 28 34 6d 6d | 29 20 20 20 20 20 20 20 |rdul(4mm|)       |
|000001e0| 20 25 25 20 73 65 74 20 | 67 6f 62 6f 61 72 64 20 | %% set |goboard |
|000001f0| 75 6e 69 74 20 6c 65 6e | 67 74 68 0a 25 20 5c 67 |unit len|gth.% \g|
|00000200| 6f 62 6f 61 72 64 73 74 | 79 6c 65 28 32 2c 31 2c |oboardst|yle(2,1,|
|00000210| 30 2c 32 29 20 25 25 20 | 6e 6f 72 74 68 20 61 6e |0,2) %% |north an|
|00000220| 64 20 77 65 73 74 20 65 | 64 67 65 20 63 6c 6f 73 |d west e|dge clos|
|00000230| 65 20 77 69 74 68 20 6d | 61 72 6b 0a 25 20 20 20 |e with m|ark.%   |
|00000240| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000250| 20 20 20 20 20 25 25 20 | 65 61 73 74 20 65 64 67 |     %% |east edg|
|00000260| 65 20 63 6c 6f 73 65 20 | 77 69 74 68 20 6e 6f 20 |e close |with no |
|00000270| 6d 61 72 6b 0a 25 20 20 | 20 20 20 20 20 20 20 20 |mark.%  |        |
|00000280| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 25 25 |        |      %%|
|00000290| 20 73 6f 75 74 68 20 65 | 64 67 65 20 6f 70 65 6e | south e|dge open|
|000002a0| 0a 25 20 5c 62 65 67 69 | 6e 7b 67 6f 62 6f 61 72 |.% \begi|n{goboar|
|000002b0| 64 7d 7b 31 39 7d 7b 38 | 7d 20 25 25 20 61 20 31 |d}{19}{8|} %% a 1|
|000002c0| 39 20 62 79 20 38 20 62 | 6f 61 72 64 0a 25 20 20 |9 by 8 b|oard.%  |
|000002d0| 20 20 41 20 42 20 43 20 | 44 20 45 20 46 20 47 20 |  A B C |D E F G |
|000002e0| 48 20 4a 20 4b 20 4c 20 | 4d 20 4e 20 4f 20 50 20 |H J K L |M N O P |
|000002f0| 51 20 52 20 53 20 54 0a | 25 20 31 39 20 2e 20 2e |Q R S T.|% 19 . .|
|00000300| 20 2e 20 2e 20 2e 20 2e | 20 2e 20 2e 20 2e 20 2e | . . . .| . . . .|
|00000310| 20 2e 20 2e 20 2e 20 2e | 20 2e 20 2e 20 2e 20 2e | . . . .| . . . .|
|00000320| 20 2e 0a 25 20 31 38 20 | 2e 20 2e 20 23 20 23 20 | ..% 18 |. . # # |
|00000330| 4f 20 2e 20 2e 20 2e 20 | 2e 20 2e 20 2e 20 2e 20 |O . . . |. . . . |
|00000340| 2e 20 2e 20 2e 20 2e 20 | 2e 20 2e 20 2e 0a 25 20 |. . . . |. . ..% |
|00000350| 31 37 20 2e 20 2e 20 23 | 20 4f 20 2e 20 4f 20 2e |17 . . #| O . O .|
|00000360| 20 2e 20 2e 20 23 20 2e | 20 2e 20 2e 20 2e 20 2e | . . # .| . . . .|
|00000370| 20 2e 20 2e 20 2e 20 2e | 0a 25 20 31 36 20 2e 20 | . . . .|.% 16 . |
|00000380| 23 20 23 20 4f 20 2e 20 | 2e 20 2e 20 2e 20 2e 20 |# # O . |. . . . |
|00000390| 2b 20 2e 20 2e 20 2e 20 | 41 20 2e 20 23 20 2e 20 |+ . . . |A . # . |
|000003a0| 2e 20 2e 20 20 20 20 20 | 20 20 20 0a 25 20 31 35 |. .     |   .% 15|
|000003b0| 20 2e 20 23 20 4f 20 23 | 20 4f 20 2e 20 2e 20 2e | . # O #| O . . .|
|000003c0| 20 2e 20 2e 20 2e 20 2e | 20 2e 20 2e 20 2e 20 2e | . . . .| . . . .|
|000003d0| 20 2e 20 2e 20 2e 0a 25 | 20 31 34 20 2e 20 4f 20 | . . ..%| 14 . O |
|000003e0| 4f 20 2e 20 2e 20 2e 20 | 2e 20 2e 20 2e 20 2e 20 |O . . . |. . . . |
|000003f0| 2e 20 2e 20 2e 20 2e 20 | 2e 20 2e 20 2e 20 2e 20 |. . . . |. . . . |
|00000400| 2e 0a 25 20 31 33 20 2e | 20 2e 20 4f 20 2e 20 2e |..% 13 .| . O . .|
|00000410| 20 2e 20 2e 20 2e 20 2e | 20 2e 20 2e 20 2e 20 2e | . . . .| . . . .|
|00000420| 20 2e 20 2e 20 2e 20 2e | 20 2e 20 2e 0a 25 20 31 | . . . .| . ..% 1|
|00000430| 32 20 2e 20 2e 20 2e 20 | 2e 20 2e 20 2e 20 2e 20 |2 . . . |. . . . |
|00000440| 2e 20 2e 20 2e 20 2e 20 | 2e 20 2e 20 2e 20 2e 20 |. . . . |. . . . |
|00000450| 2e 20 2e 20 2e 20 2e 0a | 25 20 5c 65 6e 64 7b 67 |. . . ..|% \end{g|
|00000460| 6f 62 6f 61 72 64 7d 0a | 25 20 25 20 4e 6f 74 65 |oboard}.|% % Note|
|00000470| 20 74 68 61 74 20 6e 6f | 74 68 69 6e 67 2c 20 65 | that no|thing, e|
|00000480| 78 63 65 70 74 20 6d 61 | 72 6b 73 2c 20 61 6c 6c |xcept ma|rks, all|
|00000490| 6f 77 65 64 20 69 6e 20 | 74 68 65 20 72 69 67 68 |owed in |the righ|
|000004a0| 74 20 65 6e 64 20 6f 66 | 20 74 68 65 20 62 6f 61 |t end of| the boa|
|000004b0| 72 64 21 0a 25 20 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |rd!.% **|********|
|000004c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000004d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000004e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000004f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 25 20 54 68 69 |********|**.% Thi|
|00000500| 73 20 73 65 74 20 6f 66 | 20 6d 61 63 72 6f 73 20 |s set of| macros |
|00000510| 63 61 6e 20 61 6c 73 6f | 20 62 65 20 75 73 65 64 |can also| be used|
|00000520| 20 74 6f 20 74 72 61 6e | 73 6c 61 74 65 0a 25 20 | to tran|slate.% |
|00000530| 6f 74 68 65 72 20 41 53 | 43 49 49 20 70 69 63 74 |other AS|CII pict|
|00000540| 75 72 65 73 20 74 6f 20 | 54 65 58 2e 20 46 6f 72 |ures to |TeX. For|
|00000550| 20 65 78 61 6d 70 6c 65 | 2c 0a 25 20 79 6f 75 20 | example|,.% you |
|00000560| 63 61 6e 20 64 6f 20 61 | 20 70 6c 6f 74 20 69 6e |can do a| plot in|
|00000570| 20 4c 61 54 65 58 20 61 | 73 20 66 6f 6c 6c 6f 77 | LaTeX a|s follow|
|00000580| 2e 0a 25 0a 25 20 5c 67 | 6f 62 6f 61 72 64 75 6c |..%.% \g|oboardul|
|00000590| 28 34 6d 6d 29 0a 25 20 | 5c 73 65 74 6e 75 6c 6c |(4mm).% |\setnull|
|000005a0| 74 6f 6b 65 6e 28 2e 29 | 20 20 25 25 20 73 65 74 |token(.)|  %% set|
|000005b0| 20 2e 20 61 73 20 61 20 | 62 6c 61 6e 6b 2e 0a 25 | . as a |blank..%|
|000005c0| 20 5c 62 6c 61 63 6b 75 | 6e 69 74 28 30 2e 33 29 | \blacku|nit(0.3)|
|000005d0| 0a 25 20 5c 67 6f 62 6f | 61 72 64 73 74 79 6c 65 |.% \gobo|ardstyle|
|000005e0| 28 30 2c 30 2c 20 32 20 | 2c 32 29 0a 25 20 5c 62 |(0,0, 2 |,2).% \b|
|000005f0| 65 67 69 6e 7b 67 6f 62 | 6f 61 72 64 7d 7b 32 30 |egin{gob|oard}{20|
|00000600| 7d 7b 32 30 7d 0a 25 20 | 24 5c 62 65 74 61 24 20 |}{20}.% |$\beta$ |
|00000610| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | .......|........|
|00000620| 2e 2e 2e 2e 2e 0a 25 20 | 31 39 20 20 20 20 20 20 |......% |19      |
|00000630| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | .......|........|
|00000640| 2e 2e 2e 2e 2e 0a 25 20 | 31 38 20 20 20 20 20 20 |......% |18      |
|00000650| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | .......|........|
|00000660| 2e 2e 2e 2e 2e 0a 25 20 | 31 37 20 20 20 20 20 20 |......% |17      |
|00000670| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | .......|........|
|00000680| 2e 2e 2e 2e 2e 0a 25 20 | 31 36 20 20 20 20 20 20 |......% |16      |
|00000690| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | .......|........|
|000006a0| 2e 2e 2e 2e 2e 0a 25 20 | 24 5c 61 6c 70 68 61 24 |......% |$\alpha$|
|000006b0| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | .......|........|
|000006c0| 2e 2e 2e 2e 2e 0a 25 20 | 31 34 20 20 20 20 20 20 |......% |14      |
|000006d0| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | .......|........|
|000006e0| 2e 2e 2e 2e 2e 0a 25 20 | 31 33 20 20 20 20 20 20 |......% |13      |
|000006f0| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | .......|........|
|00000700| 2e 2e 2e 2e 2e 0a 25 20 | 31 32 20 20 20 20 20 20 |......% |12      |
|00000710| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | .......|........|
|00000720| 2e 2e 2e 2e 2e 0a 25 20 | 31 31 20 20 20 20 20 20 |......% |11      |
|00000730| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | .......|........|
|00000740| 2e 2e 2e 2e 2e 0a 25 20 | 24 5c 67 61 6d 6d 61 24 |......% |$\gamma$|
|00000750| 20 2e 2e 2e 2e 2e 2e 2e | 2e 23 23 2e 2e 2e 2e 2e | .......|.##.....|
|00000760| 2e 2e 2e 2e 2e 0a 25 20 | 39 20 20 20 20 20 20 20 |......% |9       |
|00000770| 20 2e 2e 2e 2e 2e 2e 2e | 23 2e 2e 23 2e 2e 2e 2e | .......|#..#....|
|00000780| 2e 2e 2e 2e 23 0a 25 20 | 38 20 20 20 20 20 20 20 |....#.% |8       |
|00000790| 20 2e 2e 2e 2e 2e 23 23 | 2e 2e 2e 23 2e 2e 2e 2e | .....##|...#....|
|000007a0| 2e 2e 23 2e 2e 0a 25 20 | 37 20 20 20 20 20 20 20 |..#...% |7       |
|000007b0| 20 2e 2e 2e 2e 2e 23 2e | 2e 2e 2e 2e 23 2e 2e 23 | .....#.|....#..#|
|000007c0| 23 23 2e 2e 2e 0a 25 20 | 36 20 20 20 20 20 20 20 |##....% |6       |
|000007d0| 20 2e 2e 2e 2e 23 2e 2e | 2e 2e 2e 2e 23 2e 23 2e | ....#..|....#.#.|
|000007e0| 2e 2e 2e 2e 2e 0a 25 20 | 24 5c 64 65 6c 74 61 24 |......% |$\delta$|
|000007f0| 20 2e 2e 2e 23 2e 2e 2e | 2e 2e 2e 2e 2e 23 2e 2e | ...#...|.....#..|
|00000800| 2e 2e 2e 2e 2e 0a 25 20 | 34 20 20 20 20 20 20 20 |......% |4       |
|00000810| 20 2e 2e 2e 23 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | ...#...|........|
|00000820| 2e 2e 2e 2e 2e 0a 25 20 | 33 20 20 20 20 20 20 20 |......% |3       |
|00000830| 20 2e 2e 23 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | ..#....|........|
|00000840| 2e 2e 2e 2e 2e 0a 25 20 | 32 20 20 20 20 20 20 20 |......% |2       |
|00000850| 20 23 23 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | ##.....|........|
|00000860| 2e 2e 2e 2e 2e 0a 25 20 | 31 20 20 20 20 20 20 20 |......% |1       |
|00000870| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | .......|........|
|00000880| 2e 2e 2e 2e 2e 0a 25 20 | 20 20 20 20 20 20 20 20 |......% |        |
|00000890| 20 61 20 62 20 63 20 64 | 20 65 20 66 20 67 20 68 | a b c d| e f g h|
|000008a0| 20 69 20 6a 20 6b 20 6c | 20 6d 20 6e 20 6f 20 70 | i j k l| m n o p|
|000008b0| 20 71 20 72 20 73 20 74 | 0a 25 20 5c 65 6e 64 7b | q r s t|.% \end{|
|000008c0| 67 6f 62 6f 61 72 64 7d | 0a 25 20 2a 2a 2a 2a 2a |goboard}|.% *****|
|000008d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000008e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000008f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000900| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00000910| 25 0a 25 20 20 50 55 42 | 4c 49 43 20 4d 41 43 52 |%.%  PUB|LIC MACR|
|00000920| 4f 53 0a 25 0a 25 20 20 | 5c 62 65 67 69 6e 7b 67 |OS.%.%  |\begin{g|
|00000930| 6f 62 6f 61 72 64 7d 7b | 23 31 7d 7b 23 32 7d 0a |oboard}{|#1}{#2}.|
|00000940| 25 20 20 5c 65 6e 64 7b | 67 6f 62 6f 61 72 64 7d |%  \end{|goboard}|
|00000950| 0a 25 20 20 23 31 20 61 | 6e 64 20 23 32 20 61 72 |.%  #1 a|nd #2 ar|
|00000960| 65 20 74 68 65 20 73 69 | 7a 65 20 6f 66 20 74 68 |e the si|ze of th|
|00000970| 65 20 62 6f 61 72 64 0a | 25 0a 25 20 5c 73 68 6f |e board.|%.% \sho|
|00000980| 77 74 65 78 74 28 23 31 | 2c 23 32 2c 23 33 29 0a |wtext(#1|,#2,#3).|
|00000990| 25 20 20 20 20 73 68 6f | 77 20 74 65 78 74 20 23 |%    sho|w text #|
|000009a0| 33 20 61 74 20 63 6f 6f | 72 64 69 6e 61 74 65 20 |3 at coo|rdinate |
|000009b0| 28 23 31 2c 20 23 32 29 | 20 0a 25 20 5c 73 68 6f |(#1, #2)| .% \sho|
|000009c0| 77 62 6c 61 63 6b 28 23 | 31 2c 20 23 32 29 0a 25 |wblack(#|1, #2).%|
|000009d0| 20 20 20 20 73 68 6f 77 | 20 62 6c 61 63 6b 20 73 |    show| black s|
|000009e0| 74 6f 6e 65 20 61 74 20 | 28 23 31 2c 20 23 32 29 |tone at |(#1, #2)|
|000009f0| 0a 25 20 5c 73 68 6f 77 | 77 68 69 74 65 28 23 31 |.% \show|white(#1|
|00000a00| 2c 20 23 32 29 0a 25 20 | 5c 73 68 6f 77 73 74 61 |, #2).% |\showsta|
|00000a10| 72 28 23 31 2c 20 23 32 | 29 0a 25 20 5c 73 68 6f |r(#1, #2|).% \sho|
|00000a20| 77 6e 6f 73 74 6f 6e 65 | 28 23 31 2c 23 32 29 0a |wnostone|(#1,#2).|
|00000a30| 25 0a 25 20 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |%.% ****|********|
|00000a40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000a50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000a60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000a70| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 25 20 46 6f 6c 6c 6f |********|.% Follo|
|00000a80| 77 69 6e 67 20 63 6f 6d | 6d 61 6e 64 73 20 61 72 |wing com|mands ar|
|00000a90| 65 20 74 6f 20 62 65 20 | 75 73 65 64 20 62 65 66 |e to be |used bef|
|00000aa0| 6f 72 65 20 5c 62 65 67 | 69 6e 7b 67 6f 62 6f 61 |ore \beg|in{goboa|
|00000ab0| 72 64 7d 0a 25 20 0a 25 | 20 5c 67 6f 62 6f 61 72 |rd}.% .%| \goboar|
|00000ac0| 64 73 74 79 6c 65 28 23 | 31 2c 23 32 2c 23 33 2c |dstyle(#|1,#2,#3,|
|00000ad0| 23 34 29 0a 25 20 20 20 | 20 20 6e 6f 72 74 68 20 |#4).%   |  north |
|00000ae0| 23 31 0a 25 20 20 20 20 | 20 65 61 73 74 20 20 23 |#1.%    | east  #|
|00000af0| 32 0a 25 20 20 20 20 20 | 73 6f 75 74 68 20 23 33 |2.%     |south #3|
|00000b00| 20 0a 25 20 20 20 20 20 | 77 65 73 74 20 20 23 34 | .%     |west  #4|
|00000b10| 0a 25 20 20 20 20 20 69 | 6e 64 69 78 20 74 61 6b |.%     i|ndix tak|
|00000b20| 65 73 20 33 20 76 61 6c | 75 65 73 20 61 73 20 66 |es 3 val|ues as f|
|00000b30| 6f 6c 6c 6f 77 0a 25 20 | 20 20 20 20 30 20 3a 20 |ollow.% |    0 : |
|00000b40| 6f 70 65 6e 20 65 64 67 | 65 0a 25 20 20 20 20 20 |open edg|e.%     |
|00000b50| 31 20 3a 20 63 6c 6f 73 | 65 20 65 64 67 65 20 77 |1 : clos|e edge w|
|00000b60| 69 74 68 6f 75 74 20 6d | 61 72 6b 65 72 0a 25 20 |ithout m|arker.% |
|00000b70| 20 20 20 20 32 20 3a 20 | 63 6c 6f 73 65 20 65 64 |    2 : |close ed|
|00000b80| 67 65 20 77 69 74 68 20 | 6d 61 72 6b 65 72 73 0a |ge with |markers.|
|00000b90| 25 0a 25 20 5c 67 6f 62 | 6f 61 72 64 75 6c 28 23 |%.% \gob|oardul(#|
|00000ba0| 31 29 0a 25 20 20 20 20 | 73 65 74 20 67 6f 20 62 |1).%    |set go b|
|00000bb0| 6f 61 72 64 27 73 20 75 | 6e 69 74 20 6c 65 6e 67 |oard's u|nit leng|
|00000bc0| 74 68 0a 25 0a 25 20 5c | 62 6c 61 63 6b 75 6e 69 |th.%.% \|blackuni|
|00000bd0| 74 28 23 31 29 0a 25 20 | 20 20 20 73 65 74 20 64 |t(#1).% |   set d|
|00000be0| 69 61 6d 6d 65 74 65 72 | 20 6f 66 20 62 6c 61 63 |iammeter| of blac|
|00000bf0| 6b 20 73 74 6f 6e 65 2c | 20 64 65 66 61 75 6c 74 |k stone,| default|
|00000c00| 20 69 73 20 31 20 75 6e | 69 74 2e 20 0a 25 20 20 | is 1 un|it. .%  |
|00000c10| 20 20 53 6d 61 6c 6c 65 | 72 20 75 6e 69 74 20 69 |  Smalle|r unit i|
|00000c20| 73 20 75 73 65 66 75 6c | 20 66 6f 72 20 64 6f 69 |s useful| for doi|
|00000c30| 6e 67 20 70 6c 6f 74 2c | 20 61 6e 64 20 74 72 61 |ng plot,| and tra|
|00000c40| 6e 73 6c 61 74 69 6e 67 | 20 6f 74 68 65 72 20 41 |nslating| other A|
|00000c50| 53 43 49 49 20 0a 25 20 | 20 20 20 70 69 63 74 75 |SCII .% |   pictu|
|00000c60| 72 65 2e 0a 25 0a 25 20 | 5c 77 68 69 74 65 75 6e |re..%.% |\whiteun|
|00000c70| 69 74 28 23 31 29 0a 25 | 20 20 20 20 73 65 74 20 |it(#1).%|    set |
|00000c80| 64 69 61 6d 6d 65 74 65 | 72 20 6f 66 20 77 68 69 |diammete|r of whi|
|00000c90| 74 65 20 73 74 6f 6e 65 | 2c 20 64 65 66 61 75 6c |te stone|, defaul|
|00000ca0| 74 20 69 73 20 31 20 75 | 6e 69 74 0a 25 0a 25 20 |t is 1 u|nit.%.% |
|00000cb0| 5c 73 74 61 72 75 6e 69 | 74 28 23 31 29 0a 25 20 |\staruni|t(#1).% |
|00000cc0| 20 20 20 73 65 74 20 64 | 69 61 6d 6d 65 74 65 72 |   set d|iammeter|
|00000cd0| 20 6f 66 20 77 68 69 74 | 65 20 73 74 6f 6e 65 2c | of whit|e stone,|
|00000ce0| 20 64 65 66 61 75 6c 74 | 20 69 73 20 30 2e 33 20 | default| is 0.3 |
|00000cf0| 75 6e 69 74 0a 25 0a 25 | 20 5c 73 65 74 6e 75 6c |unit.%.%| \setnul|
|00000d00| 6c 74 6f 6b 65 6e 28 23 | 31 29 0a 25 20 20 20 20 |ltoken(#|1).%    |
|00000d10| 20 73 65 74 20 6e 75 6c | 6c 20 74 6f 6b 65 6e 2c | set nul|l token,|
|00000d20| 20 64 65 66 61 75 6c 74 | 20 69 73 20 7b 3d 7d 2e | default| is {=}.|
|00000d30| 20 55 73 69 6e 67 20 74 | 68 69 73 20 74 6f 20 70 | Using t|his to p|
|00000d40| 6c 6f 74 20 77 69 74 68 | 6f 75 74 20 67 72 69 64 |lot with|out grid|
|00000d50| 2e 0a 25 0a 25 20 20 46 | 6f 6c 6c 6f 77 69 6e 67 |..%.%  F|ollowing|
|00000d60| 20 74 68 72 65 65 20 63 | 6f 6d 6d 61 6e 64 73 20 | three c|ommands |
|00000d70| 66 72 6f 6d 20 4c 61 54 | 65 58 0a 25 0a 25 20 20 |from LaT|eX.%.%  |
|00000d80| 5c 74 68 69 63 6b 6c 69 | 6e 65 73 20 25 25 20 66 |\thickli|nes %% f|
|00000d90| 72 6f 6d 20 6c 61 74 65 | 78 2c 20 64 65 66 61 75 |rom late|x, defau|
|00000da0| 6c 74 0a 25 20 20 5c 74 | 68 69 6e 6c 69 6e 65 73 |lt.%  \t|hinlines|
|00000db0| 20 25 25 20 66 72 6f 6d | 20 6c 61 74 65 78 0a 25 | %% from| latex.%|
|00000dc0| 20 20 5c 6c 69 6e 65 74 | 68 69 63 6b 6e 65 73 73 |  \linet|hickness|
|00000dd0| 7b 6c 65 6e 7d 20 25 25 | 20 61 6c 73 6f 20 66 72 |{len} %%| also fr|
|00000de0| 6f 6d 20 6c 61 74 65 78 | 2e 0a 25 0a 25 0a 25 20 |om latex|..%.%.% |
|00000df0| 5c 47 6f 54 65 58 20 0a | 25 20 20 20 20 20 20 20 |\GoTeX .|%       |
|00000e00| 47 6f 54 65 58 20 6c 6f | 67 6f 0a 25 20 5c 47 6f |GoTeX lo|go.% \Go|
|00000e10| 0a 25 20 5c 57 65 69 51 | 69 0a 25 20 2a 2a 2a 2a |.% \WeiQ|i.% ****|
|00000e20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000e30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000e40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0a 25 0a |********|*****.%.|
|00000e50| 25 20 5c 21 6e 75 6c 6c | 74 6f 6b 65 6e 20 20 20 |% \!null|token   |
|00000e60| 20 69 73 20 20 3d 0a 25 | 20 5c 21 6e 6f 73 74 6f | is  =.%| \!nosto|
|00000e70| 6e 65 74 6f 6b 65 6e 20 | 69 73 20 20 2e 0a 25 20 |netoken |is  ..% |
|00000e80| 5c 21 77 68 69 74 65 74 | 6f 6b 65 6e 20 20 20 69 |\!whitet|oken   i|
|00000e90| 73 20 20 4f 0a 25 20 5c | 21 62 6c 61 63 6b 74 6f |s  O.% \|!blackto|
|00000ea0| 6b 65 6e 61 20 20 69 73 | 20 20 40 0a 25 20 5c 21 |kena  is|  @.% \!|
|00000eb0| 62 6c 61 63 6b 74 6f 6b | 65 6e 62 20 20 6f 72 20 |blacktok|enb  or |
|00000ec0| 20 23 0a 25 20 5c 21 73 | 74 61 72 74 6f 6b 65 6e | #.% \!s|tartoken|
|00000ed0| 20 20 20 20 69 73 20 20 | 2b 0a 25 20 5c 21 76 6c |    is  |+.% \!vl|
|00000ee0| 69 6e 65 74 6f 6b 65 6e | 20 20 20 69 73 20 20 7c |inetoken|   is  ||
|00000ef0| 0a 25 20 5c 21 68 6c 69 | 6e 65 74 6f 6b 65 6e 20 |.% \!hli|netoken |
|00000f00| 20 20 69 73 20 20 2d 20 | 0a 25 20 2a 2a 2a 2a 2a |  is  - |.% *****|
|00000f10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000f20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000f30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000f40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00000f50| 0a 5c 63 61 74 63 6f 64 | 65 60 21 3d 31 31 20 25 |.\catcod|e`!=11 %|
|00000f60| 0a 0a 5c 6e 65 77 69 66 | 5c 69 66 21 67 6f 74 65 |..\newif|\if!gote|
|00000f70| 78 64 65 62 75 67 0a 5c | 21 67 6f 74 65 78 64 65 |xdebug.\|!gotexde|
|00000f80| 62 75 67 74 72 75 65 0a | 5c 64 65 66 5c 21 67 6f |bugtrue.|\def\!go|
|00000f90| 77 72 69 74 65 7b 5c 69 | 6d 6d 65 64 69 61 74 65 |write{\i|mmediate|
|00000fa0| 5c 77 72 69 74 65 31 36 | 7d 0a 5c 21 67 6f 77 72 |\write16|}.\!gowr|
|00000fb0| 69 74 65 7b 4d 79 73 74 | 65 72 69 6f 75 73 20 47 |ite{Myst|erious G|
|00000fc0| 6f 54 65 58 7d 0a 5c 21 | 67 6f 77 72 69 74 65 7b |oTeX}.\!|gowrite{|
|00000fd0| 66 72 6f 6d 20 74 68 65 | 20 61 75 74 68 6f 72 20 |from the| author |
|00000fe0| 6f 66 20 22 20 4d 79 73 | 74 65 72 69 65 73 20 6f |of " Mys|teries o|
|00000ff0| 66 20 57 65 69 51 69 20 | 2d 2d 2d 20 54 68 65 20 |f WeiQi |--- The |
|00001000| 4b 69 6e 67 27 73 20 47 | 6f 6c 64 65 6e 20 52 75 |King's G|olden Ru|
|00001010| 6c 65 73 22 7d 0a 0a 25 | 20 20 47 6f 54 65 58 20 |les"}..%|  GoTeX |
|00001020| 6c 6f 67 6f 2c 20 61 6e | 64 20 66 75 6e 6e 79 20 |logo, an|d funny |
|00001030| 57 65 69 51 69 0a 5c 64 | 65 66 5c 47 6f 7b 47 5c |WeiQi.\d|ef\Go{G\|
|00001040| 6b 65 72 6e 2d 2e 31 31 | 65 6d 5c 6c 6f 77 65 72 |kern-.11|em\lower|
|00001050| 2e 35 65 78 5c 68 62 6f | 78 7b 4f 7d 5c 6b 65 72 |.5ex\hbo|x{O}\ker|
|00001060| 6e 2d 2e 30 37 35 65 6d | 7d 0a 5c 64 65 66 5c 47 |n-.075em|}.\def\G|
|00001070| 6f 54 65 58 7b 5c 47 6f | 5c 6b 65 72 6e 2d 2e 31 |oTeX{\Go|\kern-.1|
|00001080| 31 65 6d 5c 54 65 58 7d | 0a 5c 64 65 66 5c 57 65 |1em\TeX}|.\def\We|
|00001090| 69 51 69 7b 57 65 5c 6c | 6f 77 65 72 2e 33 65 78 |iQi{We\l|ower.3ex|
|000010a0| 5c 68 62 6f 78 7b 69 7d | 5c 6b 65 72 6e 2d 2e 31 |\hbox{i}|\kern-.1|
|000010b0| 32 65 6d 5c 6c 6f 77 65 | 72 2d 2e 35 65 78 5c 68 |2em\lowe|r-.5ex\h|
|000010c0| 62 6f 78 7b 51 7d 69 7d | 0a 0a 25 25 20 54 6f 20 |box{Q}i}|..%% To |
|000010d0| 77 61 74 63 68 20 54 65 | 58 20 69 6e 20 61 63 74 |watch Te|X in act|
|000010e0| 69 6f 6e 0a 25 25 20 5c | 74 72 61 63 69 6e 67 6d |ion.%% \|tracingm|
|000010f0| 61 63 72 6f 73 3d 32 0a | 25 25 20 5c 74 72 61 63 |acros=2.|%% \trac|
|00001100| 69 6e 67 63 6f 6d 6d 61 | 6e 64 73 3d 32 0a 0a 25 |ingcomma|nds=2..%|
|00001110| 25 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |% ******|********|
|00001120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001130| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001140| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001150| 2a 2a 2a 2a 2a 2a 0a 25 | 25 20 20 50 52 49 56 41 |******.%|%  PRIVA|
|00001160| 54 45 20 4d 41 43 52 4f | 53 0a 25 25 20 2e 2e 2e |TE MACRO|S.%% ...|
|00001170| 0a 25 25 20 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.%% ****|********|
|00001180| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001190| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000011a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000011b0| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 0a 5c 64 65 66 5c 5c |********|..\def\\|
|000011c0| 7b 5c 6c 65 74 5c 21 73 | 65 70 74 6f 6b 65 6e 3d |{\let\!s|eptoken=|
|000011d0| 20 7d 20 5c 5c 20 20 25 | 20 20 73 65 74 20 5c 73 | } \\  %|  set \s|
|000011e0| 65 70 74 6f 6b 65 6e 20 | 74 6f 20 61 20 73 70 61 |eptoken |to a spa|
|000011f0| 63 65 20 74 6f 6b 65 6e | 0a 20 0a 25 25 20 43 6f |ce token|. .%% Co|
|00001200| 6d 6d 61 6e 64 73 20 74 | 6f 20 63 79 63 6c 65 20 |mmands t|o cycle |
|00001210| 74 68 72 6f 75 67 68 20 | 74 6f 6b 65 6e 20 6c 69 |through |token li|
|00001220| 73 74 0a 0a 5c 64 65 66 | 5c 21 64 6f 62 6f 61 72 |st..\def|\!doboar|
|00001230| 64 7b 20 25 0a 20 20 20 | 5c 21 63 68 65 63 6b 70 |d{ %.   |\!checkp|
|00001240| 6f 73 69 74 69 6f 6e 0a | 20 20 20 5c 69 66 21 6f |osition.|   \if!o|
|00001250| 75 74 6f 66 62 6f 61 72 | 64 20 5c 6c 65 74 5c 21 |utofboar|d \let\!|
|00001260| 64 6f 69 74 3d 5c 21 64 | 6f 6f 75 74 62 6f 61 72 |doit=\!d|ooutboar|
|00001270| 64 20 0a 20 20 20 20 20 | 20 5c 65 6c 73 65 20 5c |d .     | \else \|
|00001280| 6c 65 74 5c 21 64 6f 69 | 74 3d 5c 21 64 6f 69 6e |let\!doi|t=\!doin|
|00001290| 62 6f 61 72 64 20 0a 20 | 20 20 5c 66 69 0a 20 20 |board . |  \fi.  |
|000012a0| 20 5c 21 64 6f 69 74 0a | 7d 0a 0a 5c 64 65 66 5c | \!doit.|}..\def\|
|000012b0| 21 64 6f 6f 75 74 62 6f | 61 72 64 23 31 7b 20 25 |!dooutbo|ard#1{ %|
|000012c0| 0a 5c 65 64 65 66 5c 21 | 74 65 78 74 74 6f 6b 65 |.\edef\!|texttoke|
|000012d0| 6e 7b 5c 21 74 65 78 74 | 74 6f 6b 65 6e 23 31 7d |n{\!text|token#1}|
|000012e0| 0a 5c 66 75 74 75 72 65 | 6c 65 74 5c 21 6e 65 78 |.\future|let\!nex|
|000012f0| 74 63 68 61 72 5c 21 67 | 65 74 6e 65 78 74 0a 7d |tchar\!g|etnext.}|
|00001300| 0a 5c 64 65 66 5c 21 67 | 65 74 6e 65 78 74 7b 0a |.\def\!g|etnext{.|
|00001310| 5c 69 66 78 20 5c 21 6e | 65 78 74 63 68 61 72 20 |\ifx \!n|extchar |
|00001320| 5c 21 73 65 70 74 6f 6b | 65 6e 0a 20 20 20 5c 6c |\!septok|en.   \l|
|00001330| 65 74 20 5c 21 6e 65 78 | 74 3d 5c 21 74 65 78 74 |et \!nex|t=\!text|
|00001340| 70 61 72 73 65 72 0a 5c | 65 6c 73 65 20 0a 20 20 |parser.\|else .  |
|00001350| 20 5c 6c 65 74 20 5c 21 | 6e 65 78 74 3d 5c 21 64 | \let \!|next=\!d|
|00001360| 6f 6f 75 74 62 6f 61 72 | 64 0a 5c 66 69 0a 5c 21 |ooutboar|d.\fi.\!|
|00001370| 6e 65 78 74 0a 7d 0a 0a | 5c 64 65 66 5c 21 74 65 |next.}..|\def\!te|
|00001380| 78 74 70 61 72 73 65 72 | 7b 0a 20 20 20 5c 69 66 |xtparser|{.   \if|
|00001390| 78 5c 21 74 65 78 74 74 | 6f 6b 65 6e 5c 21 6e 75 |x\!textt|oken\!nu|
|000013a0| 6c 6c 74 6f 6b 65 6e 20 | 25 0a 20 20 20 20 20 20 |lltoken |%.      |
|000013b0| 5c 65 6c 73 65 20 5c 73 | 68 6f 77 74 65 78 74 28 |\else \s|howtext(|
|000013c0| 5c 21 63 75 72 72 65 6e | 74 78 2c 5c 21 63 75 72 |\!curren|tx,\!cur|
|000013d0| 72 65 6e 74 79 2c 5c 21 | 74 65 78 74 74 6f 6b 65 |renty,\!|texttoke|
|000013e0| 6e 29 0a 20 20 20 5c 66 | 69 0a 20 20 20 5c 64 65 |n).   \f|i.   \de|
|000013f0| 66 5c 21 74 65 78 74 74 | 6f 6b 65 6e 7b 7d 0a 20 |f\!textt|oken{}. |
|00001400| 20 20 5c 21 61 64 76 61 | 6e 63 65 63 6f 6f 72 64 |  \!adva|ncecoord|
|00001410| 0a 20 20 20 5c 21 66 69 | 6e 69 73 68 65 64 7b 5c |.   \!fi|nished{\|
|00001420| 21 63 6c 65 61 6e 75 70 | 7d 7b 5c 21 64 6f 62 6f |!cleanup|}{\!dobo|
|00001430| 61 72 64 7d 0a 7d 0a 0a | 5c 6c 6f 6e 67 5c 64 65 |ard}.}..|\long\de|
|00001440| 66 5c 21 64 6f 69 6e 62 | 6f 61 72 64 23 31 7b 20 |f\!doinb|oard#1{ |
|00001450| 25 0a 20 20 20 5c 21 67 | 6f 70 61 72 73 65 72 7b |%.   \!g|oparser{|
|00001460| 23 31 7d 0a 20 20 20 5c | 21 61 64 76 61 6e 63 65 |#1}.   \|!advance|
|00001470| 63 6f 6f 72 64 0a 20 20 | 20 5c 21 66 69 6e 69 73 |coord.  | \!finis|
|00001480| 68 65 64 7b 5c 21 63 6c | 65 61 6e 75 70 7d 7b 5c |hed{\!cl|eanup}{\|
|00001490| 21 64 6f 62 6f 61 72 64 | 7d 0a 7d 0a 0a 5c 64 65 |!doboard|}.}..\de|
|000014a0| 66 5c 21 63 6c 65 61 6e | 75 70 7b 5c 6d 65 73 73 |f\!clean|up{\mess|
|000014b0| 61 67 65 7b 20 3e 64 6f | 6e 65 3c 20 7d 5c 69 67 |age{ >do|ne< }\ig|
|000014c0| 6e 6f 72 65 73 70 61 63 | 65 73 7d 0a 0a 5c 64 65 |norespac|es}..\de|
|000014d0| 66 5c 21 66 69 6e 69 73 | 68 65 64 23 31 23 32 7b |f\!finis|hed#1#2{|
|000014e0| 0a 5c 69 66 6e 75 6d 5c | 21 63 75 72 72 65 6e 74 |.\ifnum\|!current|
|000014f0| 79 3c 30 20 20 20 20 25 | 25 20 64 6f 6e 65 21 0a |y<0    %|% done!.|
|00001500| 20 20 20 5c 6c 65 74 5c | 21 61 6e 73 77 65 72 3d |   \let\|!answer=|
|00001510| 23 31 0a 5c 65 6c 73 65 | 20 5c 6c 65 74 5c 21 61 |#1.\else| \let\!a|
|00001520| 6e 73 77 65 72 3d 23 32 | 0a 5c 66 69 0a 5c 21 61 |nswer=#2|.\fi.\!a|
|00001530| 6e 73 77 65 72 0a 7d 0a | 0a 5c 64 65 66 5c 67 6f |nswer.}.|.\def\go|
|00001540| 62 6f 61 72 64 73 74 79 | 6c 65 28 23 31 2c 23 32 |boardsty|le(#1,#2|
|00001550| 2c 23 33 2c 23 34 29 7b | 0a 5c 21 6e 6f 72 74 68 |,#3,#4){|.\!north|
|00001560| 69 6e 64 65 78 3d 23 31 | 20 20 25 25 25 20 6f 72 |index=#1|  %%% or|
|00001570| 64 65 72 20 6f 6e 20 42 | 72 69 64 67 65 20 54 61 |der on B|ridge Ta|
|00001580| 62 6c 65 0a 5c 21 65 61 | 73 74 69 6e 64 65 78 3d |ble.\!ea|stindex=|
|00001590| 23 32 0a 5c 21 73 6f 75 | 74 68 69 6e 64 65 78 3d |#2.\!sou|thindex=|
|000015a0| 23 33 0a 5c 21 77 65 73 | 74 69 6e 64 65 78 3d 23 |#3.\!wes|tindex=#|
|000015b0| 34 0a 7d 0a 5c 64 65 66 | 5c 67 6f 62 6f 61 72 64 |4.}.\def|\goboard|
|000015c0| 75 6c 28 23 31 29 7b 5c | 73 65 74 6c 65 6e 67 74 |ul(#1){\|setlengt|
|000015d0| 68 7b 5c 75 6e 69 74 6c | 65 6e 67 74 68 7d 7b 23 |h{\unitl|ength}{#|
|000015e0| 31 7d 7d 0a 0a 25 25 0a | 5c 67 6c 6f 62 61 6c 5c |1}}..%%.|\global\|
|000015f0| 6e 65 77 63 6f 75 6e 74 | 5c 21 62 6f 61 72 64 63 |newcount|\!boardc|
|00001600| 6f 75 6e 74 0a 5c 6e 65 | 77 63 6f 75 6e 74 5c 21 |ount.\ne|wcount\!|
|00001610| 6e 6f 72 74 68 69 6e 64 | 65 78 0a 5c 6e 65 77 63 |northind|ex.\newc|
|00001620| 6f 75 6e 74 5c 21 65 61 | 73 74 69 6e 64 65 78 0a |ount\!ea|stindex.|
|00001630| 5c 6e 65 77 63 6f 75 6e | 74 5c 21 73 6f 75 74 68 |\newcoun|t\!south|
|00001640| 69 6e 64 65 78 0a 5c 6e | 65 77 63 6f 75 6e 74 5c |index.\n|ewcount\|
|00001650| 21 77 65 73 74 69 6e 64 | 65 78 0a 5c 6e 65 77 63 |!westind|ex.\newc|
|00001660| 6f 75 6e 74 5c 21 63 75 | 72 72 65 6e 74 78 20 20 |ount\!cu|rrentx  |
|00001670| 5c 6e 65 77 63 6f 75 6e | 74 5c 21 63 75 72 72 65 |\newcoun|t\!curre|
|00001680| 6e 74 79 0a 5c 6e 65 77 | 63 6f 75 6e 74 5c 21 68 |nty.\new|count\!h|
|00001690| 62 6f 61 72 64 73 69 7a | 65 20 5c 6e 65 77 63 6f |boardsiz|e \newco|
|000016a0| 75 6e 74 5c 21 76 62 6f | 61 72 64 73 69 7a 65 0a |unt\!vbo|ardsize.|
|000016b0| 0a 5c 64 65 66 5c 62 6c | 61 63 6b 75 6e 69 74 28 |.\def\bl|ackunit(|
|000016c0| 23 31 29 7b 5c 64 65 66 | 5c 21 62 6c 61 63 6b 75 |#1){\def|\!blacku|
|000016d0| 6e 69 74 7b 23 31 7d 7d | 0a 5c 64 65 66 5c 77 68 |nit{#1}}|.\def\wh|
|000016e0| 69 74 65 75 6e 69 74 28 | 23 31 29 7b 5c 64 65 66 |iteunit(|#1){\def|
|000016f0| 5c 21 77 68 69 74 65 75 | 6e 69 74 7b 23 31 7d 7d |\!whiteu|nit{#1}}|
|00001700| 0a 5c 64 65 66 5c 73 74 | 61 72 75 6e 69 74 28 23 |.\def\st|arunit(#|
|00001710| 31 29 7b 5c 64 65 66 5c | 21 73 74 61 72 75 6e 69 |1){\def\|!staruni|
|00001720| 74 7b 23 31 7d 7d 0a 0a | 5c 6e 65 77 69 66 5c 69 |t{#1}}..|\newif\i|
|00001730| 66 21 6f 75 74 6f 66 62 | 6f 61 72 64 0a 0a 5c 64 |f!outofb|oard..\d|
|00001740| 65 66 5c 21 69 6e 69 74 | 70 61 72 61 7b 0a 20 20 |ef\!init|para{.  |
|00001750| 20 5c 21 6f 75 74 6f 66 | 62 6f 61 72 64 66 61 6c | \!outof|boardfal|
|00001760| 73 65 0a 20 20 20 5c 67 | 6c 6f 62 61 6c 5c 21 62 |se.   \g|lobal\!b|
|00001770| 6f 61 72 64 63 6f 75 6e | 74 3d 30 0a 20 20 20 5c |oardcoun|t=0.   \|
|00001780| 67 6f 62 6f 61 72 64 73 | 74 79 6c 65 28 31 2c 31 |goboards|tyle(1,1|
|00001790| 2c 31 2c 31 29 0a 0a 25 | 20 64 69 6d 6d 65 6e 74 |,1,1)..%| dimment|
|000017a0| 69 6f 6e 0a 20 20 20 5c | 74 68 69 63 6b 6c 69 6e |ion.   \|thicklin|
|000017b0| 65 73 20 25 25 20 66 72 | 6f 6d 20 6c 61 74 65 78 |es %% fr|om latex|
|000017c0| 0a 20 20 20 5c 62 6c 61 | 63 6b 75 6e 69 74 28 31 |.   \bla|ckunit(1|
|000017d0| 29 0a 20 20 20 5c 77 68 | 69 74 65 75 6e 69 74 28 |).   \wh|iteunit(|
|000017e0| 31 29 0a 20 20 20 5c 73 | 74 61 72 75 6e 69 74 28 |1).   \s|tarunit(|
|000017f0| 30 2e 33 29 0a 20 20 20 | 5c 67 6f 62 6f 61 72 64 |0.3).   |\goboard|
|00001800| 75 6c 28 35 6d 6d 29 0a | 0a 20 20 20 5c 64 65 66 |ul(5mm).|.   \def|
|00001810| 5c 21 74 65 78 74 74 6f | 6b 65 6e 7b 7d 20 0a 7d |\!textto|ken{} .}|
|00001820| 0a 5c 21 69 6e 69 74 70 | 61 72 61 0a 0a 5c 64 65 |.\!initp|ara..\de|
|00001830| 66 5c 21 61 64 76 61 6e | 63 65 63 6f 6f 72 64 7b |f\!advan|cecoord{|
|00001840| 0a 5c 69 66 6e 75 6d 5c | 21 63 75 72 72 65 6e 74 |.\ifnum\|!current|
|00001850| 78 3c 5c 21 68 62 6f 61 | 72 64 73 69 7a 65 0a 20 |x<\!hboa|rdsize. |
|00001860| 20 20 5c 61 64 76 61 6e | 63 65 5c 21 63 75 72 72 |  \advan|ce\!curr|
|00001870| 65 6e 74 78 20 62 79 20 | 31 20 0a 5c 65 6c 73 65 |entx by |1 .\else|
|00001880| 20 0a 20 20 20 20 5c 69 | 66 6e 75 6d 5c 21 63 75 | .    \i|fnum\!cu|
|00001890| 72 72 65 6e 74 78 3d 5c | 21 68 62 6f 61 72 64 73 |rrentx=\|!hboards|
|000018a0| 69 7a 65 0a 20 20 20 20 | 20 20 20 5c 69 66 6e 75 |ize.    |   \ifnu|
|000018b0| 6d 5c 21 63 75 72 72 65 | 6e 74 79 3e 5c 21 76 62 |m\!curre|nty>\!vb|
|000018c0| 6f 61 72 64 73 69 7a 65 | 20 5c 21 6e 65 78 74 6c |oardsize| \!nextl|
|000018d0| 69 6e 65 0a 20 20 20 20 | 20 20 20 5c 65 6c 73 65 |ine.    |   \else|
|000018e0| 20 5c 69 66 6e 75 6d 5c | 21 63 75 72 72 65 6e 74 | \ifnum\|!current|
|000018f0| 79 3d 30 20 5c 21 6e 65 | 78 74 6c 69 6e 65 0a 20 |y=0 \!ne|xtline. |
|00001900| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 65 6c |        |     \el|
|00001910| 73 65 20 5c 69 66 6e 75 | 6d 5c 21 65 61 73 74 69 |se \ifnu|m\!easti|
|00001920| 6e 64 65 78 3c 32 20 5c | 21 6e 65 78 74 6c 69 6e |ndex<2 \|!nextlin|
|00001930| 65 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |e.      |        |
|00001940| 20 20 20 20 20 20 5c 65 | 6c 73 65 20 5c 61 64 76 |      \e|lse \adv|
|00001950| 61 6e 63 65 5c 21 63 75 | 72 72 65 6e 74 78 20 62 |ance\!cu|rrentx b|
|00001960| 79 20 31 20 0a 20 20 20 | 20 20 20 20 20 20 20 20 |y 1 .   |        |
|00001970| 20 20 20 20 20 20 20 20 | 20 5c 66 69 0a 20 20 20 |        | \fi.   |
|00001980| 20 20 20 20 20 20 20 20 | 20 20 20 5c 66 69 0a 20 |        |   \fi. |
|00001990| 20 20 20 20 20 20 5c 66 | 69 0a 20 20 20 20 5c 65 |      \f|i.    \e|
|000019a0| 6c 73 65 20 5c 21 6e 65 | 78 74 6c 69 6e 65 0a 20 |lse \!ne|xtline. |
|000019b0| 20 20 20 5c 66 69 0a 5c | 66 69 0a 7d 0a 0a 5c 64 |   \fi.\|fi.}..\d|
|000019c0| 65 66 5c 21 6e 65 78 74 | 6c 69 6e 65 7b 0a 20 20 |ef\!next|line{.  |
|000019d0| 20 5c 6d 65 73 73 61 67 | 65 7b 20 3e 20 5c 74 68 | \messag|e{ > \th|
|000019e0| 65 5c 21 63 75 72 72 65 | 6e 74 79 20 7d 0a 20 20 |e\!curre|nty }.  |
|000019f0| 20 5c 61 64 76 61 6e 63 | 65 5c 21 63 75 72 72 65 | \advanc|e\!curre|
|00001a00| 6e 74 79 2d 31 20 0a 20 | 20 20 5c 69 66 6e 75 6d |nty-1 . |  \ifnum|
|00001a10| 5c 21 77 65 73 74 69 6e | 64 65 78 3c 32 20 5c 21 |\!westin|dex<2 \!|
|00001a20| 63 75 72 72 65 6e 74 78 | 3d 31 0a 20 20 20 20 20 |currentx|=1.     |
|00001a30| 20 5c 65 6c 73 65 20 5c | 21 63 75 72 72 65 6e 74 | \else \|!current|
|00001a40| 78 3d 30 0a 20 20 20 5c | 66 69 0a 0a 25 25 25 20 |x=0.   \|fi..%%% |
|00001a50| 61 64 6a 75 73 74 6d 65 | 6e 74 0a 5c 69 66 6e 75 |adjustme|nt.\ifnu|
|00001a60| 6d 5c 21 63 75 72 72 65 | 6e 74 79 3d 30 0a 20 20 |m\!curre|nty=0.  |
|00001a70| 20 5c 69 66 6e 75 6d 5c | 21 73 6f 75 74 68 69 6e | \ifnum\|!southin|
|00001a80| 64 65 78 3c 32 20 5c 21 | 63 75 72 72 65 6e 74 79 |dex<2 \!|currenty|
|00001a90| 3d 2d 31 0a 20 20 20 20 | 20 20 5c 65 6c 73 65 20 |=-1.    |  \else |
|00001aa0| 5c 21 63 75 72 72 65 6e | 74 79 3d 30 20 5c 21 63 |\!curren|ty=0 \!c|
|00001ab0| 75 72 72 65 6e 74 78 3d | 31 20 25 25 25 20 66 69 |urrentx=|1 %%% fi|
|00001ac0| 72 73 74 20 61 74 20 28 | 31 2c 30 29 0a 20 20 20 |rst at (|1,0).   |
|00001ad0| 5c 66 69 0a 5c 66 69 0a | 7d 0a 0a 5c 64 65 66 5c |\fi.\fi.|}..\def\|
|00001ae0| 21 63 68 65 63 6b 70 6f | 73 69 74 69 6f 6e 0a 7b |!checkpo|sition.{|
|00001af0| 0a 5c 21 6f 75 74 6f 66 | 62 6f 61 72 64 74 72 75 |.\!outof|boardtru|
|00001b00| 65 0a 5c 69 66 6e 75 6d | 5c 21 63 75 72 72 65 6e |e.\ifnum|\!curren|
|00001b10| 74 79 3e 5c 21 76 62 6f | 61 72 64 73 69 7a 65 20 |ty>\!vbo|ardsize |
|00001b20| 0a 5c 65 6c 73 65 20 5c | 69 66 6e 75 6d 5c 21 63 |.\else \|ifnum\!c|
|00001b30| 75 72 72 65 6e 74 79 3c | 31 0a 20 20 20 20 20 20 |urrenty<|1.      |
|00001b40| 5c 65 6c 73 65 20 20 20 | 0a 20 20 20 20 20 20 20 |\else   |.       |
|00001b50| 20 5c 69 66 6e 75 6d 5c | 21 63 75 72 72 65 6e 74 | \ifnum\|!current|
|00001b60| 78 3e 5c 21 68 62 6f 61 | 72 64 73 69 7a 65 0a 20 |x>\!hboa|rdsize. |
|00001b70| 20 20 20 20 20 20 20 5c | 65 6c 73 65 20 5c 69 66 |       \|else \if|
|00001b80| 6e 75 6d 5c 21 63 75 72 | 72 65 6e 74 78 3c 31 20 |num\!cur|rentx<1 |
|00001b90| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 5c |.       |       \|
|00001ba0| 65 6c 73 65 20 5c 21 6f | 75 74 6f 66 62 6f 61 72 |else \!o|utofboar|
|00001bb0| 64 66 61 6c 73 65 0a 20 | 20 20 20 20 20 20 20 20 |dfalse. |        |
|00001bc0| 20 20 20 20 20 5c 66 69 | 0a 20 20 20 20 20 20 20 |     \fi|.       |
|00001bd0| 20 5c 66 69 0a 20 20 20 | 20 20 20 5c 66 69 0a 5c | \fi.   |   \fi.\|
|00001be0| 66 69 0a 7d 0a 0a 5c 64 | 65 66 5c 21 72 65 73 65 |fi.}..\d|ef\!rese|
|00001bf0| 74 70 61 72 61 7b 0a 5c | 67 6c 6f 62 61 6c 5c 61 |tpara{.\|global\a|
|00001c00| 64 76 61 6e 63 65 5c 21 | 62 6f 61 72 64 63 6f 75 |dvance\!|boardcou|
|00001c10| 6e 74 20 62 79 20 31 0a | 0a 5c 21 63 75 72 72 65 |nt by 1.|.\!curre|
|00001c20| 6e 74 78 3d 31 20 5c 21 | 63 75 72 72 65 6e 74 79 |ntx=1 \!|currenty|
|00001c30| 3d 5c 21 76 62 6f 61 72 | 64 73 69 7a 65 0a 25 25 |=\!vboar|dsize.%%|
|00001c40| 20 61 64 6a 75 73 74 0a | 5c 69 66 6e 75 6d 5c 21 | adjust.|\ifnum\!|
|00001c50| 6e 6f 72 74 68 69 6e 64 | 65 78 3e 31 0a 20 20 5c |northind|ex>1.  \|
|00001c60| 61 64 76 61 6e 63 65 20 | 5c 21 63 75 72 72 65 6e |advance |\!curren|
|00001c70| 74 79 20 62 79 20 31 0a | 5c 65 6c 73 65 0a 20 20 |ty by 1.|\else.  |
|00001c80| 20 20 5c 69 66 6e 75 6d | 5c 21 77 65 73 74 69 6e |  \ifnum|\!westin|
|00001c90| 64 65 78 3e 31 0a 20 20 | 20 20 20 20 20 5c 61 64 |dex>1.  |     \ad|
|00001ca0| 76 61 6e 63 65 20 5c 21 | 63 75 72 72 65 6e 74 78 |vance \!|currentx|
|00001cb0| 20 62 79 20 2d 31 0a 20 | 20 20 20 5c 66 69 0a 5c | by -1. |   \fi.\|
|00001cc0| 66 69 0a 0a 7d 0a 0a 5c | 6e 65 77 65 6e 76 69 72 |fi..}..\|newenvir|
|00001cd0| 6f 6e 6d 65 6e 74 7b 67 | 6f 62 6f 61 72 64 7d 5b |onment{g|oboard}[|
|00001ce0| 32 5d 7b 0a 20 20 20 20 | 20 20 5c 21 68 62 6f 61 |2]{.    |  \!hboa|
|00001cf0| 72 64 73 69 7a 65 3d 23 | 31 5c 21 76 62 6f 61 72 |rdsize=#|1\!vboar|
|00001d00| 64 73 69 7a 65 3d 23 32 | 0a 20 20 20 20 20 20 5c |dsize=#2|.      \|
|00001d10| 21 72 65 73 65 74 70 61 | 72 61 0a 20 20 20 5c 21 |!resetpa|ra.   \!|
|00001d20| 67 6f 77 72 69 74 65 7b | 47 6f 20 62 6f 61 72 64 |gowrite{|Go board|
|00001d30| 20 5c 74 68 65 5c 21 62 | 6f 61 72 64 63 6f 75 6e | \the\!b|oardcoun|
|00001d40| 74 20 3a 20 20 42 65 67 | 69 6e 7d 0a 20 20 20 5c |t :  Beg|in}.   \|
|00001d50| 6e 65 77 63 6f 75 6e 74 | 20 5c 21 72 65 61 6c 68 |newcount| \!realh|
|00001d60| 73 69 7a 65 20 5c 21 72 | 65 61 6c 68 73 69 7a 65 |size \!r|ealhsize|
|00001d70| 3d 5c 21 76 62 6f 61 72 | 64 73 69 7a 65 0a 20 20 |=\!vboar|dsize.  |
|00001d80| 20 5c 6e 65 77 63 6f 75 | 6e 74 20 5c 21 72 65 61 | \newcou|nt \!rea|
|00001d90| 6c 76 73 69 7a 65 20 5c | 21 72 65 61 6c 76 73 69 |lvsize \|!realvsi|
|00001da0| 7a 65 3d 5c 21 76 62 6f | 61 72 64 73 69 7a 65 0a |ze=\!vbo|ardsize.|
|00001db0| 20 20 20 5c 61 64 76 61 | 6e 63 65 5c 21 72 65 61 |   \adva|nce\!rea|
|00001dc0| 6c 68 73 69 7a 65 20 32 | 20 5c 61 64 76 61 6e 63 |lhsize 2| \advanc|
|00001dd0| 65 5c 21 72 65 61 6c 76 | 73 69 7a 65 20 32 0a 20 |e\!realv|size 2. |
|00001de0| 20 20 5c 62 65 67 69 6e | 7b 70 69 63 74 75 72 65 |  \begin|{picture|
|00001df0| 7d 28 5c 21 72 65 61 6c | 68 73 69 7a 65 2c 20 5c |}(\!real|hsize, \|
|00001e00| 21 72 65 61 6c 76 73 69 | 7a 65 29 28 30 2c 30 29 |!realvsi|ze)(0,0)|
|00001e10| 0a 20 20 20 20 20 20 5c | 63 61 74 63 6f 64 65 60 |.      \|catcode`|
|00001e20| 5c 23 3d 31 31 20 20 20 | 20 25 25 20 68 61 73 68 |\#=11   | %% hash|
|00001e30| 20 6d 61 72 6b 20 66 6f | 72 20 62 6c 61 63 6b 20 | mark fo|r black |
|00001e40| 73 74 6f 6e 65 0a 20 20 | 20 20 20 20 5c 21 64 6f |stone.  |    \!do|
|00001e50| 62 6f 61 72 64 0a 7d 7b | 5c 65 6e 64 7b 70 69 63 |board.}{|\end{pic|
|00001e60| 74 75 72 65 7d 0a 20 20 | 20 20 20 20 5c 63 61 74 |ture}.  |    \cat|
|00001e70| 63 6f 64 65 60 5c 23 3d | 36 20 25 25 20 62 61 63 |code`\#=|6 %% bac|
|00001e80| 6b 20 74 6f 20 68 61 73 | 68 20 6d 61 72 6b 0a 20 |k to has|h mark. |
|00001e90| 20 20 20 20 20 5c 21 67 | 6f 77 72 69 74 65 7b 47 |     \!g|owrite{G|
|00001ea0| 6f 20 62 6f 61 72 64 20 | 5c 74 68 65 5c 21 62 6f |o board |\the\!bo|
|00001eb0| 61 72 64 63 6f 75 6e 74 | 20 3a 20 45 6e 64 7d 0a |ardcount| : End}.|
|00001ec0| 7d 0a 0a 25 25 25 20 47 | 6f 54 65 58 20 70 61 72 |}..%%% G|oTeX par|
|00001ed0| 73 65 72 0a 5c 64 65 66 | 5c 73 65 74 6e 75 6c 6c |ser.\def|\setnull|
|00001ee0| 74 6f 6b 65 6e 28 23 31 | 29 7b 5c 6c 65 74 5c 21 |token(#1|){\let\!|
|00001ef0| 6e 75 6c 6c 74 6f 6b 65 | 6e 3d 23 31 7d 0a 5c 6c |nulltoke|n=#1}.\l|
|00001f00| 65 74 5c 21 6e 75 6c 6c | 74 6f 6b 65 6e 3d 3d 25 |et\!null|token==%|
|00001f10| 0a 5c 6c 65 74 5c 21 6e | 6f 73 74 6f 6e 65 74 6f |.\let\!n|ostoneto|
|00001f20| 6b 65 6e 3d 2e 25 0a 5c | 6c 65 74 5c 21 77 68 69 |ken=.%.\|let\!whi|
|00001f30| 74 65 74 6f 6b 65 6e 3d | 4f 25 0a 5c 6c 65 74 5c |tetoken=|O%.\let\|
|00001f40| 21 62 6c 61 63 6b 74 6f | 6b 65 6e 61 3d 40 25 0a |!blackto|kena=@%.|
|00001f50| 5c 63 61 74 63 6f 64 65 | 60 5c 23 3d 31 31 20 25 |\catcode|`\#=11 %|
|00001f60| 25 20 68 61 73 68 20 6d | 61 72 6b 0a 5c 6c 65 74 |% hash m|ark.\let|
|00001f70| 5c 21 62 6c 61 63 6b 74 | 6f 6b 65 6e 62 3d 23 25 |\!blackt|okenb=#%|
|00001f80| 0a 5c 63 61 74 63 6f 64 | 65 60 5c 23 3d 36 20 20 |.\catcod|e`\#=6  |
|00001f90| 25 25 20 62 61 63 6b 20 | 74 6f 20 68 61 73 68 20 |%% back |to hash |
|00001fa0| 6d 61 72 6b 0a 5c 6c 65 | 74 5c 21 73 74 61 72 74 |mark.\le|t\!start|
|00001fb0| 6f 6b 65 6e 3d 2b 25 0a | 5c 6c 65 74 5c 21 76 6c |oken=+%.|\let\!vl|
|00001fc0| 69 6e 65 74 6f 6b 65 6e | 3d 7c 25 0a 5c 6c 65 74 |inetoken|=|%.\let|
|00001fd0| 5c 21 68 6c 69 6e 65 74 | 6f 6b 65 6e 3d 2d 25 0a |\!hlinet|oken=-%.|
|00001fe0| 0a 5c 64 65 66 5c 21 67 | 6f 70 61 72 73 65 72 23 |.\def\!g|oparser#|
|00001ff0| 31 7b 0a 5c 69 66 78 23 | 31 5c 21 6e 75 6c 6c 74 |1{.\ifx#|1\!nullt|
|00002000| 6f 6b 65 6e 20 25 20 5c | 72 65 6c 61 78 0a 20 20 |oken % \|relax.  |
|00002010| 20 5c 65 6c 73 65 20 0a | 20 20 20 20 20 20 5c 69 | \else .|      \i|
|00002020| 66 78 23 31 5c 21 6e 6f | 73 74 6f 6e 65 74 6f 6b |fx#1\!no|stonetok|
|00002030| 65 6e 20 5c 73 68 6f 77 | 6e 6f 73 74 6f 6e 65 28 |en \show|nostone(|
|00002040| 5c 21 63 75 72 72 65 6e | 74 78 2c 5c 21 63 75 72 |\!curren|tx,\!cur|
|00002050| 72 65 6e 74 79 29 0a 20 | 20 20 20 20 20 20 20 20 |renty). |        |
|00002060| 5c 65 6c 73 65 20 5c 21 | 70 77 68 69 74 65 23 31 |\else \!|pwhite#1|
|00002070| 20 0a 20 20 20 20 20 20 | 5c 66 69 0a 5c 66 69 0a | .      |\fi.\fi.|
|00002080| 7d 0a 0a 5c 64 65 66 5c | 21 70 77 68 69 74 65 23 |}..\def\|!pwhite#|
|00002090| 31 7b 0a 5c 69 66 78 23 | 31 5c 21 77 68 69 74 65 |1{.\ifx#|1\!white|
|000020a0| 74 6f 6b 65 6e 20 5c 73 | 68 6f 77 77 68 69 74 65 |token \s|howwhite|
|000020b0| 28 5c 21 63 75 72 72 65 | 6e 74 78 2c 5c 21 63 75 |(\!curre|ntx,\!cu|
|000020c0| 72 72 65 6e 74 79 29 0a | 5c 65 6c 73 65 20 5c 21 |rrenty).|\else \!|
|000020d0| 70 62 6c 61 63 6b 23 31 | 20 5c 66 69 0a 7d 0a 0a |pblack#1| \fi.}..|
|000020e0| 5c 64 65 66 5c 21 70 62 | 6c 61 63 6b 23 31 7b 0a |\def\!pb|lack#1{.|
|000020f0| 5c 69 66 78 23 31 5c 21 | 62 6c 61 63 6b 74 6f 6b |\ifx#1\!|blacktok|
|00002100| 65 6e 61 20 5c 73 68 6f | 77 62 6c 61 63 6b 28 5c |ena \sho|wblack(\|
|00002110| 21 63 75 72 72 65 6e 74 | 78 2c 5c 21 63 75 72 72 |!current|x,\!curr|
|00002120| 65 6e 74 79 29 0a 20 20 | 20 5c 65 6c 73 65 20 5c |enty).  | \else \|
|00002130| 69 66 78 23 31 5c 21 62 | 6c 61 63 6b 74 6f 6b 65 |ifx#1\!b|lacktoke|
|00002140| 6e 62 20 5c 73 68 6f 77 | 62 6c 61 63 6b 28 5c 21 |nb \show|black(\!|
|00002150| 63 75 72 72 65 6e 74 78 | 2c 5c 21 63 75 72 72 65 |currentx|,\!curre|
|00002160| 6e 74 79 29 0a 20 20 20 | 20 20 20 20 20 20 20 5c |nty).   |       \|
|00002170| 65 6c 73 65 20 5c 21 70 | 73 74 61 72 23 31 0a 20 |else \!p|star#1. |
|00002180| 20 20 20 20 20 20 20 20 | 20 5c 66 69 0a 5c 66 69 |        | \fi.\fi|
|00002190| 0a 7d 0a 0a 5c 64 65 66 | 5c 21 70 73 74 61 72 23 |.}..\def|\!pstar#|
|000021a0| 31 7b 0a 5c 69 66 78 23 | 31 5c 21 73 74 61 72 74 |1{.\ifx#|1\!start|
|000021b0| 6f 6b 65 6e 20 0a 20 20 | 5c 73 68 6f 77 6e 6f 73 |oken .  |\shownos|
|000021c0| 74 6f 6e 65 28 5c 21 63 | 75 72 72 65 6e 74 78 2c |tone(\!c|urrentx,|
|000021d0| 5c 21 63 75 72 72 65 6e | 74 79 29 0a 20 20 20 5c |\!curren|ty).   \|
|000021e0| 73 68 6f 77 73 74 61 72 | 28 5c 21 63 75 72 72 65 |showstar|(\!curre|
|000021f0| 6e 74 78 2c 5c 21 63 75 | 72 72 65 6e 74 79 29 0a |ntx,\!cu|rrenty).|
|00002200| 5c 65 6c 73 65 20 5c 21 | 70 76 6c 69 6e 65 23 31 |\else \!|pvline#1|
|00002210| 0a 5c 66 69 0a 7d 0a 0a | 5c 64 65 66 5c 21 70 76 |.\fi.}..|\def\!pv|
|00002220| 6c 69 6e 65 23 31 7b 0a | 5c 69 66 78 23 31 5c 21 |line#1{.|\ifx#1\!|
|00002230| 76 6c 69 6e 65 74 6f 6b | 65 6e 0a 20 20 5c 73 68 |vlinetok|en.  \sh|
|00002240| 6f 77 76 6c 69 6e 65 5c | 21 63 75 72 72 65 6e 74 |owvline\|!current|
|00002250| 78 5c 21 63 75 72 72 65 | 6e 74 79 0a 5c 65 6c 73 |x\!curre|nty.\els|
|00002260| 65 20 5c 21 70 68 6c 69 | 6e 65 23 31 0a 5c 66 69 |e \!phli|ne#1.\fi|
|00002270| 0a 7d 0a 0a 5c 64 65 66 | 5c 21 70 68 6c 69 6e 65 |.}..\def|\!phline|
|00002280| 23 31 7b 0a 5c 69 66 78 | 23 31 5c 21 68 6c 69 6e |#1{.\ifx|#1\!hlin|
|00002290| 65 74 6f 6b 65 6e 0a 20 | 20 5c 73 68 6f 77 68 6c |etoken. | \showhl|
|000022a0| 69 6e 65 5c 21 63 75 72 | 72 65 6e 74 78 5c 21 63 |ine\!cur|rentx\!c|
|000022b0| 75 72 72 65 6e 74 79 0a | 5c 65 6c 73 65 20 5c 6d |urrenty.|\else \m|
|000022c0| 61 72 6b 6e 6f 73 74 6f | 6e 65 23 31 0a 5c 66 69 |arknosto|ne#1.\fi|
|000022d0| 0a 7d 0a 0a 5c 64 65 66 | 5c 6d 61 72 6b 6e 6f 73 |.}..\def|\marknos|
|000022e0| 74 6f 6e 65 23 31 7b 0a | 5c 73 68 6f 77 74 65 78 |tone#1{.|\showtex|
|000022f0| 74 28 5c 21 63 75 72 72 | 65 6e 74 78 2c 20 5c 21 |t(\!curr|entx, \!|
|00002300| 63 75 72 72 65 6e 74 79 | 2c 23 31 29 0a 5c 73 68 |currenty|,#1).\sh|
|00002310| 6f 77 6e 6f 73 74 6f 6e | 65 28 5c 21 63 75 72 72 |ownoston|e(\!curr|
|00002320| 65 6e 74 78 2c 5c 21 63 | 75 72 72 65 6e 74 79 29 |entx,\!c|urrenty)|
|00002330| 0a 7d 0a 0a 25 25 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.}..%% *|********|
|00002340| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002350| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002360| 2a 2a 2a 2a 2a 2a 2a 0a | 25 25 20 42 6f 61 72 64 |*******.|%% Board|
|00002370| 20 49 6d 61 67 65 73 3a | 0a 25 25 20 2a 2a 2a 2a | Images:|.%% ****|
|00002380| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002390| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000023a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0a 0a 25 25 |********|****..%%|
|000023b0| 20 57 68 69 74 65 20 53 | 74 6f 6e 65 0a 5c 64 65 | White S|tone.\de|
|000023c0| 66 5c 73 68 6f 77 77 68 | 69 74 65 28 23 31 2c 23 |f\showwh|ite(#1,#|
|000023d0| 32 29 7b 0a 5c 70 75 74 | 28 23 31 2c 23 32 29 7b |2){.\put|(#1,#2){|
|000023e0| 5c 63 69 72 63 6c 65 7b | 5c 21 77 68 69 74 65 75 |\circle{|\!whiteu|
|000023f0| 6e 69 74 7d 7d 0a 7d 0a | 0a 25 25 20 42 6c 61 63 |nit}}.}.|.%% Blac|
|00002400| 6b 20 53 74 6f 6e 65 0a | 5c 64 65 66 5c 73 68 6f |k Stone.|\def\sho|
|00002410| 77 62 6c 61 63 6b 28 23 | 31 2c 23 32 29 7b 0a 5c |wblack(#|1,#2){.\|
|00002420| 70 75 74 28 23 31 2c 23 | 32 29 7b 5c 63 69 72 63 |put(#1,#|2){\circ|
|00002430| 6c 65 2a 7b 5c 21 62 6c | 61 63 6b 75 6e 69 74 7d |le*{\!bl|ackunit}|
|00002440| 7d 0a 7d 0a 0a 25 25 20 | 4d 61 72 6b 0a 5c 64 65 |}.}..%% |Mark.\de|
|00002450| 66 5c 73 68 6f 77 74 65 | 78 74 28 23 31 2c 23 32 |f\showte|xt(#1,#2|
|00002460| 2c 23 33 29 7b 0a 5c 70 | 75 74 28 23 31 2c 20 23 |,#3){.\p|ut(#1, #|
|00002470| 32 29 7b 5c 6b 65 72 6e | 2d 30 2e 36 65 78 5c 6c |2){\kern|-0.6ex\l|
|00002480| 6f 77 65 72 2e 36 65 78 | 5c 68 62 6f 78 7b 23 33 |ower.6ex|\hbox{#3|
|00002490| 7d 7d 0a 25 25 20 5c 70 | 75 74 28 23 31 2c 20 23 |}}.%% \p|ut(#1, #|
|000024a0| 32 29 7b 23 33 7d 0a 7d | 0a 0a 25 25 20 53 74 61 |2){#3}.}|..%% Sta|
|000024b0| 72 20 70 6f 69 6e 74 0a | 5c 64 65 66 5c 73 68 6f |r point.|\def\sho|
|000024c0| 77 73 74 61 72 28 23 31 | 2c 23 32 29 7b 0a 5c 70 |wstar(#1|,#2){.\p|
|000024d0| 75 74 28 23 31 2c 23 32 | 29 7b 5c 63 69 72 63 6c |ut(#1,#2|){\circl|
|000024e0| 65 2a 7b 5c 21 73 74 61 | 72 75 6e 69 74 7d 7d 0a |e*{\!sta|runit}}.|
|000024f0| 7d 0a 0a 25 25 20 6e 6f | 20 73 74 6f 6e 65 20 69 |}..%% no| stone i|
|00002500| 6e 20 74 68 65 20 6d 69 | 64 64 6c 65 20 61 6e 64 |n the mi|ddle and|
|00002510| 20 65 64 67 65 73 0a 0a | 5c 64 65 66 5c 73 68 6f | edges..|\def\sho|
|00002520| 77 6e 6f 73 74 6f 6e 65 | 28 23 31 2c 23 32 29 7b |wnostone|(#1,#2){|
|00002530| 0a 25 25 20 74 6f 20 6e | 6f 72 74 68 0a 5c 69 66 |.%% to n|orth.\if|
|00002540| 6e 75 6d 5c 21 6e 6f 72 | 74 68 69 6e 64 65 78 3e |num\!nor|thindex>|
|00002550| 30 20 20 20 25 25 0a 20 | 5c 69 66 6e 75 6d 5c 21 |0   %%. |\ifnum\!|
|00002560| 63 75 72 72 65 6e 74 79 | 3c 5c 21 76 62 6f 61 72 |currenty|<\!vboar|
|00002570| 64 73 69 7a 65 0a 20 20 | 20 20 20 5c 70 75 74 28 |dsize.  |   \put(|
|00002580| 23 31 2c 20 23 32 29 7b | 5c 6c 69 6e 65 28 30 2c |#1, #2){|\line(0,|
|00002590| 31 29 7b 30 2e 35 7d 7d | 0a 20 20 5c 66 69 0a 5c |1){0.5}}|.  \fi.\|
|000025a0| 65 6c 73 65 20 5c 70 75 | 74 28 23 31 2c 20 23 32 |else \pu|t(#1, #2|
|000025b0| 29 7b 5c 6c 69 6e 65 28 | 30 2c 31 29 7b 30 2e 35 |){\line(|0,1){0.5|
|000025c0| 7d 7d 0a 5c 66 69 0a 0a | 25 25 20 74 6f 20 53 6f |}}.\fi..|%% to So|
|000025d0| 75 74 68 0a 5c 69 66 6e | 75 6d 5c 21 73 6f 75 74 |uth.\ifn|um\!sout|
|000025e0| 68 69 6e 64 65 78 3e 30 | 0a 20 20 5c 69 66 6e 75 |hindex>0|.  \ifnu|
|000025f0| 6d 5c 21 63 75 72 72 65 | 6e 74 79 3e 31 0a 20 20 |m\!curre|nty>1.  |
|00002600| 20 20 20 5c 70 75 74 28 | 23 31 2c 20 23 32 29 7b |   \put(|#1, #2){|
|00002610| 5c 6c 69 6e 65 28 30 2c | 2d 31 29 7b 30 2e 35 7d |\line(0,|-1){0.5}|
|00002620| 7d 0a 20 20 5c 66 69 0a | 5c 65 6c 73 65 20 5c 70 |}.  \fi.|\else \p|
|00002630| 75 74 28 23 31 2c 20 23 | 32 29 7b 5c 6c 69 6e 65 |ut(#1, #|2){\line|
|00002640| 28 30 2c 2d 31 29 7b 30 | 2e 35 7d 7d 0a 5c 66 69 |(0,-1){0|.5}}.\fi|
|00002650| 0a 0a 25 25 20 74 6f 20 | 65 61 73 74 0a 5c 69 66 |..%% to |east.\if|
|00002660| 6e 75 6d 5c 21 65 61 73 | 74 69 6e 64 65 78 3e 30 |num\!eas|tindex>0|
|00002670| 0a 20 20 5c 69 66 6e 75 | 6d 5c 21 63 75 72 72 65 |.  \ifnu|m\!curre|
|00002680| 6e 74 78 3c 5c 21 68 62 | 6f 61 72 64 73 69 7a 65 |ntx<\!hb|oardsize|
|00002690| 0a 20 20 20 20 20 5c 70 | 75 74 28 23 31 2c 20 23 |.     \p|ut(#1, #|
|000026a0| 32 29 7b 5c 6c 69 6e 65 | 28 31 2c 30 29 7b 30 2e |2){\line|(1,0){0.|
|000026b0| 35 7d 7d 0a 20 20 5c 66 | 69 0a 5c 65 6c 73 65 20 |5}}.  \f|i.\else |
|000026c0| 5c 70 75 74 28 23 31 2c | 20 23 32 29 7b 5c 6c 69 |\put(#1,| #2){\li|
|000026d0| 6e 65 28 31 2c 30 29 7b | 30 2e 35 7d 7d 0a 5c 66 |ne(1,0){|0.5}}.\f|
|000026e0| 69 0a 0a 25 25 20 74 6f | 20 77 65 73 74 0a 5c 69 |i..%% to| west.\i|
|000026f0| 66 6e 75 6d 5c 21 77 65 | 73 74 69 6e 64 65 78 3e |fnum\!we|stindex>|
|00002700| 30 0a 20 20 5c 69 66 6e | 75 6d 5c 21 63 75 72 72 |0.  \ifn|um\!curr|
|00002710| 65 6e 74 78 3e 31 0a 20 | 20 20 20 20 5c 70 75 74 |entx>1. |    \put|
|00002720| 28 23 31 2c 20 23 32 29 | 7b 5c 6c 69 6e 65 28 2d |(#1, #2)|{\line(-|
|00002730| 31 2c 30 29 7b 30 2e 35 | 7d 7d 0a 20 20 5c 66 69 |1,0){0.5|}}.  \fi|
|00002740| 0a 5c 65 6c 73 65 20 5c | 70 75 74 28 23 31 2c 20 |.\else \|put(#1, |
|00002750| 23 32 29 7b 5c 6c 69 6e | 65 28 2d 31 2c 30 29 7b |#2){\lin|e(-1,0){|
|00002760| 30 2e 35 7d 7d 0a 5c 66 | 69 0a 7d 0a 0a 25 25 20 |0.5}}.\f|i.}..%% |
|00002770| 68 6f 72 69 7a 6f 6e 74 | 61 6c 20 6c 69 6e 65 20 |horizont|al line |
|00002780| 31 20 75 6e 69 74 20 74 | 6f 20 65 61 73 74 0a 5c |1 unit t|o east.\|
|00002790| 64 65 66 5c 73 68 6f 77 | 68 6c 69 6e 65 23 31 23 |def\show|hline#1#|
|000027a0| 32 7b 0a 20 20 20 5c 70 | 75 74 28 23 31 2c 20 23 |2{.   \p|ut(#1, #|
|000027b0| 32 29 7b 5c 6c 69 6e 65 | 28 31 2c 30 29 7b 31 7d |2){\line|(1,0){1}|
|000027c0| 7d 0a 7d 0a 25 25 20 76 | 65 72 74 69 63 61 6c 20 |}.}.%% v|ertical |
|000027d0| 6c 69 6e 65 20 74 6f 20 | 73 6f 75 74 68 0a 5c 64 |line to |south.\d|
|000027e0| 65 66 5c 73 68 6f 77 76 | 6c 69 6e 65 23 31 23 32 |ef\showv|line#1#2|
|000027f0| 7b 0a 20 20 20 5c 70 75 | 74 28 23 31 2c 20 23 32 |{.   \pu|t(#1, #2|
|00002800| 29 7b 5c 6c 69 6e 65 28 | 30 2c 2d 31 29 7b 31 7d |){\line(|0,-1){1}|
|00002810| 7d 0a 7d 0a 0a 25 25 25 | 20 48 6f 72 69 7a 6f 6e |}.}..%%%| Horizon|
|00002820| 74 61 6c 20 6c 69 6e 65 | 20 66 72 6f 6d 20 28 23 |tal line| from (#|
|00002830| 31 2c 20 23 32 29 20 77 | 69 74 68 20 6c 65 6e 67 |1, #2) w|ith leng|
|00002840| 74 68 20 23 33 0a 5c 64 | 65 66 5c 48 6c 69 6e 65 |th #3.\d|ef\Hline|
|00002850| 23 31 23 32 23 33 7b 0a | 20 20 20 5c 70 75 74 28 |#1#2#3{.|   \put(|
|00002860| 23 31 2c 20 23 32 29 7b | 5c 6c 69 6e 65 28 31 2c |#1, #2){|\line(1,|
|00002870| 30 29 7b 23 33 7d 7d 0a | 7d 0a 5c 64 65 66 5c 48 |0){#3}}.|}.\def\H|
|00002880| 4c 49 4e 45 23 31 23 32 | 7b 0a 20 20 20 5c 6d 75 |LINE#1#2|{.   \mu|
|00002890| 6c 74 69 70 75 74 28 31 | 2c 23 31 29 28 30 2c 31 |ltiput(1|,#1)(0,1|
|000028a0| 29 7b 23 32 7d 7b 5c 6c | 69 6e 65 28 31 2c 30 29 |){#2}{\l|ine(1,0)|
|000028b0| 7b 31 38 7d 7d 0a 7d 0a | 0a 25 25 25 20 56 65 72 |{18}}.}.|.%%% Ver|
|000028c0| 74 69 63 61 6c 20 4c 69 | 6e 65 20 66 72 6f 6d 20 |tical Li|ne from |
|000028d0| 28 23 31 2c 20 23 32 29 | 20 77 69 74 68 20 6c 65 |(#1, #2)| with le|
|000028e0| 6e 67 74 68 20 23 33 0a | 5c 64 65 66 5c 56 6c 69 |ngth #3.|\def\Vli|
|000028f0| 6e 65 23 31 23 32 23 33 | 7b 0a 20 20 20 5c 70 75 |ne#1#2#3|{.   \pu|
|00002900| 74 28 23 31 2c 20 23 32 | 29 7b 5c 6c 69 6e 65 28 |t(#1, #2|){\line(|
|00002910| 30 2c 31 29 7b 23 33 7d | 7d 0a 7d 0a 5c 64 65 66 |0,1){#3}|}.}.\def|
|00002920| 5c 56 4c 49 4e 45 23 31 | 23 32 7b 0a 20 20 20 5c |\VLINE#1|#2{.   \|
|00002930| 6d 75 6c 74 69 70 75 74 | 28 23 31 2c 31 29 28 31 |multiput|(#1,1)(1|
|00002940| 2c 30 29 7b 23 32 7d 7b | 5c 6c 69 6e 65 28 30 2c |,0){#2}{|\line(0,|
|00002950| 31 29 7b 31 38 7d 7d 0a | 7d 0a 0a 5c 63 61 74 63 |1){18}}.|}..\catc|
|00002960| 6f 64 65 60 21 3d 31 32 | 20 25 20 0a 25 25 20 2a |ode`!=12| % .%% *|
|00002970| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002980| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002990| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000029a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0a 25 |********|******.%|
|000029b0| 25 20 54 68 69 73 20 69 | 73 20 74 68 65 20 65 6e |% This i|s the en|
|000029c0| 64 20 6f 66 20 47 6f 54 | 65 58 0a 25 25 20 2a 2a |d of GoT|eX.%% **|
|000029d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000029e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000029f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002a00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0a 0a    |********|*****.. |
+--------+-------------------------+-------------------------+--------+--------+